#!/usr/bin/perl

foreach (@ARGV) {

unlink $_ or warn "failed on file $_ $! \n";

}
